The CICA Windows Explosion!

home *** CD-ROM | disk | FTP | other *** search

/ The CICA Windows Explosion! / The CICA Windows Explosion! - Disc 2.iso / patches / ami301c.zip / QKSTAT.SM$ / QKSTAT.SMM

Wrap

INI File | 1993-05-17 | 26KB | 1,811 lines

[ver] 4 [sty] [files] [charset] 82 ANSI (Windows, IBM CP 1252) [revisions] 0 [prn] QMS-PS 810 [port] LPT1: [lang] 1 [desc] Quickly calculate basic numeric summary information for a shaded range of numbers. 737687215 25 732310448 704 8 0 0 0 0 1 [fopts] 0 1 0 0 [lnopts] 2 Body Text 1 [docopts] 5 2 [GramStyle] [ParaNum] 1 [tag] Body Text 2 [fnt] Times New Roman 240 0 49152 [algn] 1 1 0 0 0 [spc] 33 273 1 0 0 1 100 [brk] 4 [line] 8 0 1 0 1 1 1 10 10 1 [spec] 0 0 0 1 1 0 0 0 0 [nfmt] 280 1 2 . , $ Body Text 0 0 [tag] Body Single 3 [fnt] Times New Roman 240 0 49152 [algn] 1 1 0 0 0 [spc] 33 273 1 0 0 1 100 [brk] 4 [line] 8 0 1 0 1 1 1 10 10 1 [spec] 0 0 0 1 1 0 0 0 0 [nfmt] 280 1 2 . , $ Body Single 0 0 [tag] Bullet 4 [fnt] Times New Roman 240 0 49152 [algn] 1 1 0 288 288 [spc] 33 273 1 0 0 1 100 [brk] 4 [line] 8 0 1 0 1 1 1 10 10 1 [spec] 0 0 <*0> 360 1 1 0 0 0 0 [nfmt] 272 1 2 . , $ Bullet 0 0 [tag] Bullet 1 5 [fnt] Times New Roman 240 0 49152 [algn] 1 1 288 288 288 [spc] 33 273 1 0 0 1 100 [brk] 4 [line] 8 0 1 0 1 1 1 10 10 1 [spec] 0 0 <*5> 0 1 1 0 0 0 0 [nfmt] 280 1 2 . , $ Bullet 1 0 0 [tag] Number List 6 [fnt] Times New Roman 240 0 49152 [algn] 1 1 360 360 360 [spc] 33 273 1 0 0 1 100 [brk] 4 [line] 8 0 1 0 1 1 1 10 10 1 [spec] 0 0 <*:>. 360 1 1 0 16 0 0 [nfmt] 272 1 2 . , $ Number List 0 0 [tag] Subhead 7 [fnt] Times New Roman 240 0 49155 [algn] 1 1 0 0 0 [spc] 33 273 1 72 72 1 100 [brk] 4 [line] 8 0 1 0 1 1 1 10 10 1 [spec] 0 2 0 1 1 0 0 0 0 [nfmt] 272 1 2 . , $ Subhead 0 0 [tag] Title 8 [fnt] Arial 360 0 16385 [algn] 4 1 0 0 0 [spc] 33 446 1 144 72 1 100 [brk] 16 [line] 8 0 1 0 1 1 1 10 10 1 [spec] 0 1 0 1 1 0 0 0 0 [nfmt] 272 1 2 . , $ Title 0 0 [tag] Header 9 [fnt] Times New Roman 240 0 49152 [algn] 1 1 0 0 0 [spc] 33 273 1 0 0 1 100 [brk] 4 [line] 8 0 1 0 1 1 1 10 10 1 [spec] 0 0 0 1 1 0 0 0 0 [nfmt] 280 1 2 . , $ Header 0 0 [tag] Footer 11 [fnt] Times New Roman 240 0 49152 [algn] 1 1 0 0 0 [spc] 33 273 1 0 0 1 100 [brk] 4 [line] 8 0 1 0 1 1 1 10 10 1 [spec] 0 0 0 1 1 0 0 0 0 [nfmt] 280 1 2 . , $ Footer 0 0 [lay] Standard 513 [rght] 15840 12240 1 1440 1440 1 1440 1440 0 1 0 1 0 2 1 1440 10800 12 1 720 1 1440 1 2160 1 2880 1 3600 1 4320 1 5040 1 5760 1 6480 1 7200 1 7920 1 8640 [hrght] [lyfrm] 1 11200 0 0 12240 1440 0 1 3 1 0 0 0 0 0 0 0 0 1 [frmlay] 1440 12240 1 1440 72 1 792 1440 0 1 0 1 1 0 1 1440 10800 2 2 4680 3 9360 [txt] Peyton McManus Lotus WPD > [frght] [lyfrm] 1 13248 0 14400 12240 15840 0 1 3 1 0 0 0 0 0 0 0 0 2 [frmlay] 15840 12240 1 1440 792 1 14472 1440 0 1 0 1 1 0 1 1440 10800 2 2 4680 3 9360 [txt] > [elay] [l1] 0 [edoc] <:#284,9360> <:#284,9360> <:#568,9360>Define CECREATEINSTANCE(LPHANDLE) DllCall("LTSCE01.DLL,CECREATEINSTANCE,HO",%1) <:#568,9360>Define CEDESTROYINSTANCE(HANDLE) DllCall("LTSCE01.DLL,CEDESTROYINSTANCE,HH",%1) <:#568,9360>Define CECALCNOW(HINSTANCE, lpFormula, lpOutPut) DllCall("LTSCE01.DLL,CECALCNOW,HHCC",%1,%2,%3) <:#284,9360><:f,,> <:#284,9360>define IsOKToRun(menuname) GetInfo(217, 24, %1); <:#284,9360> <:#284,9360>' Text for the dialog box <:#568,9360>Define cTocopy "To copy a value into your document, select the value then click the Copy button. Choose Paste to insert the value into your document." <:#284,9360>define cClick "Click Data...to see the data Ami Pro gathered from your selection." <:#284,9360> <:#568,9360>Define cThisFunction "This function enables you to see fast, basic summary information about numeric data." Define cSelectData "Select data from your document or click the Data... button to enter data." <:#284,9360> <:#284,9360>Define MaxChar 240 <:#284,9360>Define TooManyChars "You have selected too much data." <:#284,9360> <:#284,9360> <:#284,9360>' How we display numbers in the dlg <:#284,9360>Define NumDecimals 3 <:#284,9360> @Outline2@<:#284,9360> <:#284,9360> <:#284,9360> <:#284,9360>' Dlg Defines <:#284,9360>Define Avgradio 21 <:#284,9360>Define Sumradio 20 <:#284,9360>Define Maxradio 22 <:#284,9360>Define Minradio 23 <:#284,9360>Define Avgtext 1021 <:#284,9360>Define Sumtext 1020 <:#284,9360>Define Maxtext 1022 <:#284,9360>Define Mintext 1023 <:#284,9360>Define Copybutton 40 <:#284,9360>Define Databutton 41 <:#284,9360>Define cToCopyText 1000 <:#284,9360>Define cClickText 1001 <:#284,9360> <:#284,9360> <:#284,9360>' Win API Defines <:#284,9360>' API defines @Outline2@<:#284,9360>define WM_SETFONT 0x30 @Outline2@<:#568,9360>define CreateFont() DllCall("gdi,CreateFont,HHHHHHHHHHHHHHC", %1, %2, %3, %4, %5, %6, %7, %8, %9, %10, %11, %12, %13, %14) @Outline2@<:#284,9360>define DeleteObject(handle) DllCall("gdi,DeleteObject,HH", %1) @Outline2@<:#568,9360>Define MyGetDlgItemText(hdg, id, string, max) DllCall("User,GetDlgItemText,HHHCH",%1,%2,%3,%4) <:#284,9360>define CloseDlg(id) dllcall("user,PostMessage,HHHHHH", HDLG, 0X111, %1, 0, 0). <:#284,9360>Define EnableWindow() DllCall("User,EnableWindow,AHA",%1,%2) @Outline2@<:#568,9360>define SendMessage(hwnd, msg, wpara, lparm) DllCall("user,SendMessage,HHHHJ", %1, %2, %3, %4) @Outline2@<:#284,9360> @Outline2@<:#284,9360> <:#284,9360>Declare FindAndReplace(String, FindWhat, ReplaceWhat) <:#284,9360>Declare BuildNumberList(Val, aNumbers, List) <:#284,9360>Declare StartEngine() <:#284,9360>Declare DisplayBox(List) <:#284,9360>Declare DataDlg(Hdlg, id, value) <:#284,9360>Declare SetFontDlg(Hdlg, Id, value) <:#284,9360>Declare FontDlg(Action, Hdlg, id) <:#284,9360> @Subhead@<:#284,9360>Function GetShade() <:#284,9360>DefStr Stat, List, hInstance; <:#284,9360>Mac = GetRunningMacroFile$() <:#284,9360>If IsOKToRun(Copy) <:#284,9360> Copy() <:#284,9360>Else <:#284,9360> ClipBoardWrite("",1) <:#284,9360>Endif <:#284,9360>Id = StartEngine() <:#284,9360>If Id = 0 <:#284,9360> Message("I did not start the engine") <:#284,9360> Return 0; <:#284,9360>Endif <:#284,9360>RetVal = CECREATEINSTANCE(&hInstance) <:#284,9360>AllocGlobalVar("hInstance",1) <:#284,9360>SetGlobalVar("hInstance",hInstance) <:#284,9360>FontDlg(1,0,0) <:#284,9360> <:#284,9360>SetDlgCallBack(0,"{Mac}!InitDlg") <:#284,9360>SetDlgCallBack(Databutton,"{Mac}!DataBox") <:#284,9360>SetDlgCallBack(Copybutton,"{Mac}!CopyData") @Outline3@<:#284,9360>DlgKeyInterrupt(112, "{mac}!DisplayHelp") <:#284,9360>Box = DialogBox(".","QuickStat") <:#284,9360>CEDestroyInstance(hInstance) <:#284,9360>FreeGlobalVar("hInstance") <:#284,9360>FontDlg(4,0,0) <:#284,9360>DllFreeLib(id) <:#284,9360>End Function <:#284,9360> @Subhead@<:#284,9360>Function FindAndReplace(String, Findwhat, Replacewith) <:#284,9360>DefStr Location; <:#284,9360>OffSet = 0 <:#284,9360>While 0 != Assign(&Location, Instr(OffSet, String, FindWhat)) <:#284,9360> BeforeLocation = Left$(String, Location - 1) <:#284,9360> AfterLocation = Right$(String, Len(String) - Location); <:#284,9360> *String = StrCat$(BeforeLocation, ReplaceWith, AfterLocation) <:#284,9360>Wend <:#284,9360>End Function <:#284,9360> @Subhead@<:I0,0,0,0><:S+-1><:#284,9360>Function BuildNumberList(Val, aNumbers, List) <:#284,9360>' This function takes a string separated with spaces and creates a numeric list of values sep with a , <:#284,9360>DefStr Value, Location; <:#284,9360>sList = GetProfileString$("Intl","sList","Win.Ini") <:#284,9360>Val = StrCat$(Val," ") ' put a space at the end <:#284,9360>x = 1 <:#284,9360>OffSet = 0 <:#284,9360>Count = 1 <:#284,9360>While 0 != Assign(&Location, Instr(OffSet, Val, " ")) <:#284,9360> Value = StrField$(Val, x, " ") <:#284,9360> If IsNumeric(Value) <:#284,9360> If count = 1 <:#284,9360> TempList = "{Value}" <:#284,9360> Else <:#284,9360> TempList = StrCat$(TempList,"{sList}",Value) <:#284,9360> Endif <:#284,9360> Count = Count + 1 <:#284,9360> Endif <:#284,9360> x = x + 1 <:#284,9360> OffSet = Location + 1 <:#284,9360>Wend <:#284,9360>*List = TempList <:#284,9360>End Function @Subhead@<:#284,9360> @Subhead@<:#284,9360>Function StartEngine() <:#284,9360>LibId = DLLLoadLib("LTSCE01.DLL","CECreateInstance","HO") <:#284,9360>If LibId = 0 <:#284,9360> Message("LTSCE01.DLL not found. Copy the dll to your windows directory") <:#284,9360> Return 0; <:#284,9360>Endif <:#284,9360>Return Libid <:#284,9360>End function <:#284,9360> <:#284,9360> <:#284,9360> @Subhead@<:#284,9360>Function InitDlg(Hdlg, Id, Value) <:#284,9360>IgnoreKeyBoard(2) <:#284,9360>HourGlass(on) <:#284,9360>SetDlgItemText(hdlg,Sumradio,1) <:#284,9360>SetFontDlg(Hdlg, Id, Value) <:#284,9360>DataDlg(hDlg, Id, Value) <:#284,9360>HourGlass(off) @Subhead@<:#284,9360>End Function @Subhead@<:#284,9360> @Subhead@<:#284,9360>function DisplayHelp() @Outline2@<:#284,9360>' two defines needed for help. The help name and panel number are defined above @Outline2@<:#284,9360>define FindWindowa() DllCall("user,FindWindow,HCC", %1, %2) @Outline2@<:#284,9360>define WinHelpa(hWnd, file, cmd, ptr) DllCall("user,WinHelp,HHCHJ", %1, %2, %3, %4) @Outline2@<:#284,9360>prohWnd = FindWindowa("AmiProWndA", 0) @Outline2@<:#284,9360>helpfile = strcat$(GetAmiDirectory$(), "HelpPack.hlp") @Outline2@<:#284,9360>PanelNum= 55 @Outline2@<:#284,9360>WinHelpa(prohWnd, helpfile, 0x0001, Panelnum) @Outline2@<:#284,9360>end function @Subhead@<:#284,9360> @Subhead@<:#284,9360> @Subhead@<:#284,9360> @Subhead@<:#284,9360> @Subhead@<:#284,9360>Function FontDlg(Action, Hdlg, id) <:#284,9360>' 1 Create a font and allocvar <:#284,9360>' 2 Return the handle of the create font <:#284,9360>' 3 Set the id specified to the font <:#284,9360>' 4 Freeglobalvar and delete created object <:#284,9360> @Outline2@<:#568,9360>define CreateFontDLG() DllCall("gdi,CreateFont,HHHHHHHHHHHHHHC", %1, %2, %3, %4, %5, %6, %7, %8, %9, %10, %11, %12, %13, %14) @Outline2@<:#284,9360>define DeleteObjectDLG(handle) DllCall("gdi,DeleteObject,HH", %1) @Outline2@<:#568,9360>define SendMessageDLG(hwnd, msg, wpara, lparm) DllCall("user,SendMessage,HHHHJ", %1, %2, %3, %4) @Outline2@<:#284,9360> @Outline2@<:#284,9360> <:#284,9360>Switch Action <:#284,9360> Case 1 ' Create the font and store it @Outline2@<:#284,9360> Font = CreateFontDLG(13, 0, 0, 0, 400, 0, 0, 0, 0, 0, 0, 0, 32, "Helv") <:#284,9360> AllocGlobalVar("FontHandle",1) <:#284,9360> If Font <:#284,9360> SetGlobalVar("FontHandle",Font) <:#284,9360> Return Font <:#284,9360> Else <:#284,9360> Return 0; ' no font <:#284,9360> Endif <:#284,9360> Break; <:#284,9360> Case 2 ' Return the handle to the font <:#284,9360> Handle = GetGlobalVar$("FontHandle") <:#284,9360> If Handle <:#284,9360> Return Handle <:#284,9360> Else <:#284,9360> Return 0 <:#284,9360> Endif <:#284,9360> <:#284,9360> Case 3 ' Set the id to the font <:#284,9360> Handle = GetGlobalVar$("FontHandle") <:#284,9360> If Handle <:#284,9360> IdControl = GetDlgITem(Hdlg, id) <:#284,9360> SendMessageDlg(idControl, 0x30, Handle, 0) <:#284,9360> Return 1 <:#284,9360> Else <:#284,9360> Return 0 <:#284,9360> Endif <:#284,9360> Break; <:#284,9360> <:#284,9360> Case 4 ' Delete the font and clear the var <:#284,9360> Handle = GetGlobalVar$("FontHandle") <:#284,9360> If Handle <:#284,9360> DeleteObjectDLG(Handle) <:#284,9360> Stat = 1 <:#284,9360> Else <:#284,9360> Stat = 0 <:#284,9360> Endif <:#284,9360> FreeGlobalVar("FontHandle") <:#284,9360> Return Stat <:#284,9360> Default <:#284,9360> Message("Fontdlg received an invalid parameter {Action}") <:#284,9360>EndSwitch <:#284,9360> <:#284,9360>End Function @Subhead@<:#284,9360> @Subhead@<:#284,9360> @Subhead@<:#284,9360> @Subhead@<:#284,9360>Function SetFontDlg(Hdlg, id, Value) @Outline2@<:#284,9360>Font = FontDlg(2,0,0) @Outline2@<:#284,9360>If Font @Outline2@<:#284,9360> For t = 20 to 23 @Outline2@<:#284,9360> Htext = GetDlgItem(hDlg, t) @Outline2@<:#284,9360> hRadio = GetDlgItem(hDlg, t + 1000) @Outline2@<:#284,9360> SendMessage(hText, WM_SETFONT, font, 0) @Outline4@<:#284,9360> SendMessage(hradio, WM_SETFONT, font, 0) @Outline4@<:#284,9360> Next @Outline4@<:#284,9360> SendMessage(GetDlgItem(hdlg, cToCopyText), WM_SETFONT, font, 0) @Outline4@<:#284,9360> SendMessage(GetDlgItem(hdlg, cClickText), WM_SETFONT, font, 0) @Outline2@<:#284,9360>Endif <:#284,9360>End Function <:#284,9360> <:#284,9360> <:#284,9360> <:#284,9360> @Subhead@<:#284,9360>Function DataDlg(Hdlg, id, value) <:#284,9360>IgnoreKeyBoard(2) <:#284,9360>DefStr Sum, Avg, Median, Max, Min, hInstance, List; <:#284,9360>' Turn dlg paint off <:#284,9360>HourGlass(on) <:#284,9360>Dim aNumbers(1) <:#284,9360>val = ClipBoardRead(1) <:#284,9360> <:#284,9360>FindAndReplace(&Val, " ", " ") ' Convert tab to space <:#284,9360>FindAndReplace(&Val, Chr$(10)," ") <:#284,9360>FindAndReplace(&Val, Chr$(13)," ") <:#284,9360>FindAndReplace(&Val, "$","") ' Remove $ sign <:#284,9360>FindAndReplace(&Val, ",","") ' Remove Commas <:#284,9360>BuildNumberList(Val, &aNumbers, &List) <:#284,9360>If Len(List)<;>MaxChar <:#284,9360> List = Left$(List,MaxChar) <:#284,9360> Message(TooManyChars, "Ami Pro") <:#284,9360> Return -1; <:#284,9360>Endif <:#284,9360> <:#284,9360>hInstance = GetGlobalVar$("hInstance") <:#284,9360>CECalcNow(hInstance,"@Sum({List})",&Sum) <:#284,9360>CECalcNow(hInstance,"@Round(@Avg({List}),3)",&Avg) <:#284,9360>CECalcNow(hInstance,"@Min({List})",&Min) <:#284,9360>CECalcNow(hInstance,"@Max({List})",&Max) <:#284,9360> <:#284,9360>SetDlgItemText(Hdlg, Sumtext, Sum) <:#284,9360>SetDlgItemText(Hdlg, Avgtext, Avg) <:#284,9360>SetDlgItemText(Hdlg, Maxtext, Max) <:#284,9360>SetDlgItemText(Hdlg, Mintext, Min) <:#284,9360>If Len(List) <;> 0 <:#284,9360> SetDlgItemText(Hdlg, cTocopytext, cToCopy) <:#284,9360> SetDlgItemText(Hdlg, cClickText, cClick) <:#284,9360> EnableWindow(GetDlgItem(Hdlg, Copybutton),1) <:#284,9360>Else <:#284,9360> ' grey the copy button <:#284,9360> SetDlgItemText(Hdlg, cToCopyText, cThisFunction) <:#284,9360> SetDlgItemText(Hdlg, cClickText, cSelectData) <:#284,9360> EnableWindow(GetDlgItem(Hdlg, Copybutton),0) <:#284,9360> <:#284,9360>Endif <:#284,9360>HourGlass(off) <:#284,9360>End Function <:#284,9360> <:#284,9360> <:#284,9360> @Subhead@<:#284,9360>FUnction CopyData(Hdlg, Id, value) <:#284,9360>DefStr Data; <:#284,9360>If GetDlgItemText(Hdlg, Sumradio) <:#284,9360> MyGetDlgItemText(Hdlg, Sumtext, &Data, 80) <:#284,9360>Elseif GetDlgItemText(Hdlg, Avgradio) <:#284,9360> MyGetDlgItemText(hDlg, Avgtext, &Data, 80) <:#284,9360>Elseif GetDlgItemText(hDlg, Maxradio) <:#284,9360> MyGetDlgItemText(hDlg, Maxtext, &Data, 80) <:#284,9360>Elseif GetdlgItemText(hDlg, Minradio) <:#284,9360> MyGetDlgItemText(hDlg, Mintext, &Data, 80) <:#284,9360>Endif <:#284,9360>ClipBoardWrite(Data,1) <:#284,9360>CloseDlg(2) <:#284,9360>End Function <:#284,9360> <:#284,9360> <:#284,9360> <:#284,9360> @Subhead@<:#284,9360>Function DataBox(Hdlg, Id, Value) <:#284,9360>Value = ClipBoardRead(1) <:#284,9360>Filledit(8000,Value) <:#284,9360>Box = Dialogbox(".","Data") <:#284,9360>If Box <<<;>1 <:#284,9360> Return 0 <:#284,9360>Endif <:#284,9360>Data = GetDialogField$(8000) <:#284,9360>ClipBoardWrite(Data,1) <:#284,9360>DataDlg(Hdlg, id, value) <:#284,9360>End Function <:#284,9360> <:#284,9360> <:#284,9360> <:#284,9360> <:#284,9360> <:#284,9360>DIALOG QuickStat <:#284,9360>-2134376448 13 131 27 152 107 "" "AmiDialog" "QuickStats" <:#284,9360>FONT 8 "Helv" <:#284,9360>108 3 40 14 1 1342373889 "button" "Done" 0 <:#284,9360>108 19 40 14 40 1342373888 "button" "Copy" 0 <:#284,9360>108 35 40 14 41 1342373888 "button" "&Data..." 0 <:#284,9360>6 4 35 10 20 1342242825 "button" "&Sum" 0 <:#284,9360>6 16 40 10 21 1342242825 "button" "&Average" 0 <:#284,9360>6 28 50 10 22 1342242825 "button" "&Maximum" 0 <:#284,9360>6 40 50 10 23 1342242825 "button" "Mi&nimum" 0 <:#284,9360>6 52 142 33 1000 1342177280 "static" "text" 0 <:#284,9360>6 84 145 19 1001 1342177280 "static" "text" 0 <:#284,9360>64 4 30 8 1020 1342177282 "static" "text" 0 <:#284,9360>64 16 30 8 1021 1342177282 "static" "text" 0 <:#284,9360>64 28 30 8 1022 1342177282 "static" "text" 0 <:#284,9360>64 40 30 8 1023 1342177282 "static" "text" 0 <:#284,9360>END DIALOG <:#284,9360> <:#284,9360> DIALOG Data -2134376448 4 80 51 207 107 "" "AmiDialog" "Data" FONT 8 "Helv" 6 6 156 96 8000 1350631492 "edit" "" 0 164 4 40 14 1 1342373889 "button" "OK" 0 164 21 40 14 2 1342373888 "button" "Cancel" 0 163 49 40 27 1000 1342177281 "static" "CTRL + M for a new line" 0 END DIALOG > [Embedded] 00019089 > [macsum] 13 GetShade 0 0 8 59 FindAndReplace 555 3 5 88 BuildNumberList 807 3 8 98 StartEngine 1242 0 2 122 InitDlg 1447 3 1 133 DisplayHelp 1577 0 4 142 FontDlg 1762 3 5 155 SetFontDlg 2608 3 5 214 DataDlg 3084 3 10 231 CopyData 4483 3 2 277 DataBox 4948 3 3 295 QuickStat 5141 0 -1 311 Data 5852 0 -1 330 [macse] 14 GetShade 0 802 13 8 4 0 1313 217 24 154 13 11 00000087 2 154 1 10 00000100 0 1038 "" 1 16 StartEngine 13 8 5 6 5 5 0 18 0 11 00000200 0 3 "I did not start the engine" 5 0 15 9 0 284 "LTSCE01.DLL,CECREATEINSTANCE,HO" &3 13 8 6 0 271 "hInstance" 1 0 264 "hInstance" "{3}" 16 FontDlg 1 0 0 0 41 0 "{4}!InitDlg" 0 41 41 "{4}!DataBox" 0 41 40 "{4}!CopyData" 0 47 112 "{4}!DisplayHelp" 0 26 "." "QuickStat" 13 8 7 0 284 "LTSCE01.DLL,CEDESTROYINSTANCE,HH" "{3}" 0 266 "hInstance" 16 FontDlg 4 0 0 0 298 "{5}" 6 0 15 9 14 FindAndReplace 5 0 8 5 5 0 0 808 "{5}" "{0}" "{1}" 13 0 805 &4 [X] 13 18 1 11 00000240 6 4 5 1 3 1 0 806 "{0}" [X] 13 8 6 0 14 "{0}" 13 6 4 3 1 0 807 "{0}" [X] 13 8 7 0 16 "{6}" "{2}" "{7}" 13 28 0 10 00000029 6 3 15 9 14 BuildNumberList 0 286 "Intl" "sList" "Win.Ini" 13 8 6 0 16 "{0}" " " 13 8 0 5 1 8 7 5 0 8 8 5 1 8 9 5 0 0 808 "{8}" "{0}" " " 13 0 805 &5 [X] 13 18 1 11 00000411 0 20 "{0}" "{7}" " " 13 8 4 0 277 "{4}" 13 11 00000358 6 9 5 1 18 0 11 00000303 7 "{4}" 8 10 10 00000338 0 16 "{10}" "{6}" "{4}" 13 8 10 6 9 5 1 3 0 8 9 6 7 5 1 3 0 8 7 6 5 5 1 3 0 8 8 10 00000116 6 10 28 2 6 3 15 9 14 StartEngine 0 297 "LTSCE01.DLL" "CECreateInstance" "HO" 13 8 1 6 1 5 0 18 0 11 00000181 0 3 "LTSCE01.DLL not found. Copy the dll to your windows directory" 5 0 15 9 6 1 15 9 6 0 15 9 14 InitDlg 0 32 2 0 296 1 0 43 "{0}" 20 1 16 SetFontDlg "{0}" "{1}" "{2}" 16 DataDlg "{0}" "{1}" "{2}" 0 296 0 6 3 15 9 14 DisplayHelp 0 284 "user,FindWindow,HCC" "AmiProWndA" 0 13 8 1 0 798 13 0 16 [X] "HelpPack.hlp" 13 8 2 5 55 8 3 0 284 "user,WinHelp,HHCHJ" "{1}" "{2}" 1 "{3}" 6 0 15 9 14 FontDlg 5 1 6 0 18 0 11 00000255 0 284 "gdi,CreateFont,HHHHHHHHHHHHHHC" 13 0 0 0 400 0 0 0 0 0 0 0 0 "Helv" 13 8 4 0 271 "FontHandle" 1 6 4 11 00000217 0 264 "FontHandle" "{4}" 6 4 15 9 10 00000229 5 0 15 9 10 00000834 10 00000834 5 2 6 0 18 0 11 00000381 0 265 "FontHandle" 13 8 5 6 5 11 00000356 6 5 15 9 10 00000368 5 0 15 9 10 00000834 5 3 6 0 18 0 11 00000596 0 265 "FontHandle" 13 8 5 6 5 11 00000558 0 44 "{1}" "{2}" 13 8 6 0 284 "user,SendMessage,HHHHJ" "{6}" 48 "{5}" 0 5 1 15 9 10 00000570 5 0 15 9 10 00000834 10 00000834 5 4 6 0 18 0 11 00000785 0 265 "FontHandle" 13 8 5 6 5 11 00000730 0 284 "gdi,DeleteObject,HH" "{5}" 5 1 8 7 10 00000740 5 0 8 7 0 266 "FontHandle" 6 7 15 9 10 00000834 0 3 "Fontdlg received an invalid parameter {0}" 6 3 15 9 14 SetFontDlg 16 FontDlg 2 0 0 13 8 4 6 4 11 00000464 5 20 8 5 5 23 6 5 18 2 12 00000147 10 00000328 5 1 6 5 3 0 8 5 10 00000071 0 44 "{0}" "{5}" 13 8 6 6 5 5 1000 3 0 0 44 "{0}" [X] 13 8 7 0 284 "user,SendMessage,HHHHJ" "{6}" 48 "{4}" 0 0 284 "user,SendMessage,HHHHJ" "{7}" 48 "{4}" 0 10 00000114 0 44 "{0}" 1000 13 0 284 "user,SendMessage,HHHHJ" [X] 48 "{4}" 0 0 44 "{0}" 1001 13 0 284 "user,SendMessage,HHHHJ" [X] 48 "{4}" 0 6 3 15 9 14 DataDlg 0 32 2 0 296 1 5 1 21 11 [X] 0 1037 1 13 8 12 16 FindAndReplace &12 " " " " 0 39 10 13 16 FindAndReplace &12 [X] " " 0 39 13 13 16 FindAndReplace &12 [X] " " 16 FindAndReplace &12 "$" "" 16 FindAndReplace &12 "," "" 16 BuildNumberList "{12}" &11 &10 0 14 "{10}" 13 5 240 18 3 11 00000413 0 806 "{10}" 240 13 8 10 0 3 "You have selected too much data." "Ami Pro" 5 -1 15 9 0 265 "hInstance" 13 8 9 0 284 "LTSCE01.DLL,CECALCNOW,HHCC" "{9}" "@Sum({10})" &4 0 284 "LTSCE01.DLL,CECALCNOW,HHCC" "{9}" "@Round(@Avg({10}),3)" &5 0 284 "LTSCE01.DLL,CECALCNOW,HHCC" "{9}" "@Min({10})" &8 0 284 "LTSCE01.DLL,CECALCNOW,HHCC" "{9}" "@Max({10})" &7 0 43 "{0}" 1020 "{4}" 0 43 "{0}" 1021 "{5}" 0 43 "{0}" 1022 "{7}" 0 43 "{0}" 1023 "{8}" 0 14 "{10}" 13 5 0 18 3 11 00001125 0 43 "{0}" 1000 "To copy a value into your document, select the value then click the Copy button. Choose Paste to insert the value into your document." 0 43 "{0}" 1001 "Click Data...to see the data Ami Pro gathered from your selection." 0 44 "{0}" 40 13 0 284 "User,EnableWindow,AHA" [X] 1 10 00001378 0 43 "{0}" 1000 "This function enables you to see fast, basic summary information about numeric data." 0 43 "{0}" 1001 "Select data from your document or click the Data... button to enter data." 0 44 "{0}" 40 13 0 284 "User,EnableWindow,AHA" [X] 0 0 296 0 6 3 15 9 14 CopyData 0 42 "{0}" 20 13 11 00000110 0 284 "User,GetDlgItemText,HHHCH" "{0}" 1020 &4 80 10 00000388 0 42 "{0}" 21 13 11 00000207 0 284 "User,GetDlgItemText,HHHCH" "{0}" 1021 &4 80 10 00000388 0 42 "{0}" 22 13 11 00000304 0 284 "User,GetDlgItemText,HHHCH" "{0}" 1022 &4 80 10 00000388 0 42 "{0}" 23 13 11 00000388 0 284 "User,GetDlgItemText,HHHCH" "{0}" 1023 &4 80 0 1038 "{4}" 1 0 284 "user,PostMessage,HHHHHH" "{0}" 273 2 0 0 6 3 15 9 14 DataBox 0 1037 1 13 8 2 0 31 8000 "{2}" 0 26 "." "Data" 13 8 4 6 4 5 1 18 1 11 00000115 5 0 15 9 0 27 8000 13 8 5 0 1038 "{5}" 1 16 DataDlg "{0}" "{1}" "{2}" 6 3 15 9 DIALOG QuickStat -2134376448 13 131 27 152 107 "" "AmiDialog" "QuickStats" FONT 8 "Helv" 108 3 40 14 1 1342373889 "button" "Done" 0 108 19 40 14 40 1342373888 "button" "Copy" 0 108 35 40 14 41 1342373888 "button" "&Data..." 0 6 4 35 10 20 1342242825 "button" "&Sum" 0 6 16 40 10 21 1342242825 "button" "&Average" 0 6 28 50 10 22 1342242825 "button" "&Maximum" 0 6 40 50 10 23 1342242825 "button" "Mi&nimum" 0 6 52 142 33 1000 1342177280 "static" "text" 0 6 84 145 19 1001 1342177280 "static" "text" 0 64 4 30 8 1020 1342177282 "static" "text" 0 64 16 30 8 1021 1342177282 "static" "text" 0 64 28 30 8 1022 1342177282 "static" "text" 0 64 40 30 8 1023 1342177282 "static" "text" 0 DIALOG Data -2134376448 4 80 51 207 107 "" "AmiDialog" "Data" FONT 8 "Helv" 6 6 156 96 8000 1350631492 "edit" "" 0 164 4 40 14 1 1342373889 "button" "OK" 0 164 21 40 14 2 1342373888 "button" "Cancel" 0 163 49 40 27 1000 1342177281 "static" "CTRL + M for a new line" 0 00019114